home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 January / Macworld (1997-01).dmg / QuarkImmedia™1.01 Demo / Power Macintosh Demo / QuarkXPress - Int'l English / QuarkXPress™ Demo / QuarkXPress™ 3.32r5 Demo / QuarkXPress™ 3.32r5 Demo.rsrc / PSHD_1000 < prev    next >
Text File  |  1996-11-01  |  386b  |  7 lines
  1. /setcustomcolor where{pop/docust{save 1 index 4 get
  2.  [.5 .5 .5 0 6 -1 roll] 1 setcustomcolor currentgray
  3.  exch restore dup 1 eq exch 0 eq or}B}{/docust{F}B/setcustomcolor
  4.  {exch aload pop pop 4{4 index mul 4 1 roll}repeat setcmykcolor pop}B}ifelse
  5. /findcmykcustomcolor where{pop}{/findcmykcustomcolor{5 array astore readonly}B}ifelse
  6. /setoverprint where{pop}{/setoverprint{pop}B}ifelse
  7.